400 |
How to specifiy the symbol that indicates the decimal values while editing a floating point number
Procedure OnCreate Forward Send OnCreate Send ComBeginUpdate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Float" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComFormatColumn of hoColumn to "len(value) ? (round(value) = value ? value : value format `|,|0`) : ``" Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Set ComNumeric of hoEditor to OLEexFloatInteger Set ComOption of hoEditor OLEexEditDecimalSymbol to 44 Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0.12 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2.45 to Nothing Send Destroy to hoItems Send ComEndUpdate End_Procedure |
399 |
How can I edit a float number
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComNumeric to OLEexFloat Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
398 |
How can I edit a number
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComNumeric to OLEexInteger Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
397 |
How do I limit the length of the text that the user may enter into an edit control
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComOption OLEexEditLimitText to 1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
396 |
How can I change the password character
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComOption OLEexEditPassword to True Set ComOption OLEexEditPasswordChar to 45 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
395 |
How can I add a password field
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComOption OLEexEditPassword to True Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
394 |
How can I align the text to the right, in my edit control
Procedure OnCreate Forward Send OnCreate Variant v Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Get ComEditor of hoColumn to v Send Destroy to hoColumn Send Destroy to hoColumns Variant var_Editor Move v to var_Editor Set ComEditType to OLEEditType Set ComOption OLEexEditRight to True Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems End_Procedure |
393 |
How can I add a simple edit or text box to my column
|
392 |
How can I change the type of the editor
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 0 to Nothing Get ComAddItem of hoItems 1 to Nothing Get ComAddItem of hoItems 2 to Nothing Send Destroy to hoItems Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn1 Get ComItem of hoColumns1 "Edit" to voColumn1 Handle hoColumn1 Get Create (RefClass(cComColumn)) to hoColumn1 Set pvComObject of hoColumn1 to voColumn1 Variant voEditor1 Get ComEditor of hoColumn1 to voEditor1 Handle hoEditor1 Get Create (RefClass(cComEditor)) to hoEditor1 Set pvComObject of hoEditor1 to voEditor1 Set ComEditType of hoEditor1 to OLESpinType Send Destroy to hoEditor1 Send Destroy to hoColumn1 Send Destroy to hoColumns1 End_Procedure |
391 |
How can I add a border arround the editor
|
390 |
How do I assign an editor for the entire column
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "Edit" to Nothing Get ComAddItem of hoItems "Edit" to Nothing Get ComAddItem of hoItems "Edit" to Nothing Send Destroy to hoItems End_Procedure |
389 |
How do I check if a cell has an editor assigned
|
388 |
How do I delete or remove the editor for a sppecified cell
|
387 |
How do I hide or disable the editor assigned to a single cell
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Column" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "Edit" to Nothing Set ComCellEditorVisible of hoItems (ComAddItem(hoItems,"ReadOnly")) 0 to False Get ComAddItem of hoItems "Edit" to Nothing Send Destroy to hoItems End_Procedure |
386 |
How do I assign or change the editor for a particular cell
|
385 |
How do I get the caption of the cell as it is displayed on the control
|
384 |
How do I prevent scrolling the control's data after user does the sort
Procedure OnCreate Forward Send OnCreate Set ComEnsureOnSort to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Column" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "Item 3" to Nothing Get ComAddItem of hoItems "Item 1" to Nothing Get ComAddItem of hoItems "Item 2" to Nothing Send Destroy to hoItems Send ComPutItems (ComGetItems(Self,0)) Nothing Send ComPutItems (ComGetItems(Self,0)) Nothing Send ComPutItems (ComGetItems(Self,0)) Nothing Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn Get ComItem of hoColumns1 0 to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComSortOrder of hoColumn to OLESortAscending Send Destroy to hoColumn Send Destroy to hoColumns1 End_Procedure |
383 |
How do I ensure that the focused item is visible, after the user does the sort
Procedure OnCreate Forward Send OnCreate Set ComEnsureOnSort to True Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Column" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "Item 3" to Nothing Get ComAddItem of hoItems "Item 1" to Nothing Get ComAddItem of hoItems "Item 2" to Nothing Send Destroy to hoItems Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn Get ComItem of hoColumns1 0 to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComSortOrder of hoColumn to OLESortAscending Send Destroy to hoColumn Send Destroy to hoColumns1 End_Procedure |
382 |
How can I disable selecting multiple items by dragging
Procedure OnCreate Forward Send OnCreate Set ComSelectByDrag to False Set ComSingleSel to True End_Procedure |
381 |
Is there any function to change the default value for options of the editors
Procedure OnCreate Forward Send OnCreate Set ComDefaultEditorOption OLEexEditPassword to True Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Pass1" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn1 Get ComAdd of hoColumns1 "Pass2" to voColumn1 Handle hoColumn1 Get Create (RefClass(cComColumn)) to hoColumn1 Set pvComObject of hoColumn1 to voColumn1 Variant voEditor1 Get ComEditor of hoColumn1 to voEditor1 Handle hoEditor1 Get Create (RefClass(cComEditor)) to hoEditor1 Set pvComObject of hoEditor1 to voEditor1 Set ComEditType of hoEditor1 to OLEEditType Send Destroy to hoEditor1 Send Destroy to hoColumn1 Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellValue of hoItems (ComAddItem(hoItems,1)) 1 to 2 Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellValue of hoItems1 (ComAddItem(hoItems1,1)) 1 to 2 Send Destroy to hoItems1 End_Procedure |
380 |
How do I close the editor, or stop editing a cell
|
379 |
Is there any function to highlight or mark the cells that have a tooltip using my picture or icon
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Set ComMarkTooltipCells to True Set ComMarkTooltipCellsImage to 1 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellToolTip of hoItems (ComAddItem(hoItems,"This is a cell with a tooltip")) 0 to "This is a bit of text that is shown when the cursor hovers the cell." Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellToolTip of hoItems1 (ComAddItem(hoItems1,"This is a cell without a tooltip")) 0 to "" Send Destroy to hoItems1 End_Procedure |
378 |
Is there any function to highlight or mark the cells that have a tooltip
Procedure OnCreate Forward Send OnCreate Set ComMarkTooltipCells to True Set ComTooltipCellsColor to (RGB(255,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellToolTip of hoItems (ComAddItem(hoItems,"This is a cell with a tooltip")) 0 to "This is a bit of text that is shown when the cursor hovers the cell." Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellToolTip of hoItems1 (ComAddItem(hoItems1,"This is a cell without a tooltip")) 0 to "" Send Destroy to hoItems1 End_Procedure |
377 |
Is there any function to highlight or mark the cells that have a tooltip
Procedure OnCreate Forward Send OnCreate Set ComMarkTooltipCells to True Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellToolTip of hoItems (ComAddItem(hoItems,"This is a cell with a tooltip")) 0 to "This is a bit of text that is shown when the cursor hovers the cell." Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellToolTip of hoItems1 (ComAddItem(hoItems1,"This is a cell without a tooltip")) 0 to "" Send Destroy to hoItems1 End_Procedure |
376 |
How do I find the window's handled when an editor is running
|
375 |
How can I start editing the cell
Procedure OnCreate Forward Send OnCreate Set ComAutoEdit to False Send ComEdit Nothing End_Procedure |
374 |
Is there any option to edit the control's data manually, so the editor doesn't show up as soon as the cell is focused
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit1" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn1 Get ComAdd of hoColumns1 "Edit2" to voColumn1 Handle hoColumn1 Get Create (RefClass(cComColumn)) to hoColumn1 Set pvComObject of hoColumn1 to voColumn1 Variant voEditor1 Get ComEditor of hoColumn1 to voEditor1 Handle hoEditor1 Get Create (RefClass(cComEditor)) to hoEditor1 Set pvComObject of hoEditor1 to voEditor1 Set ComEditType of hoEditor1 to OLEEditType Send Destroy to hoEditor1 Send Destroy to hoColumn1 Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellValue of hoItems (ComAddItem(hoItems,1)) 1 to 2 Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellValue of hoItems1 (ComAddItem(hoItems1,3)) 1 to 4 Send Destroy to hoItems1 Set ComAutoEdit to False End_Procedure |
373 |
How can change the background color for selected editor
Procedure OnCreate Forward Send OnCreate Set ComBackground OLEexSelectInPlace to (RGB(255,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Editor" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEDropDownListType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 20 to Nothing Send Destroy to hoItems End_Procedure |
372 |
How can change the visual appearance for the spin control, using your EBN files
Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Set ComBackground OLEexSpinUpButtonUp to |CI$1000000 Set ComBackground OLEexSpinUpButtonDown to |CI$2000000 Set ComBackground OLEexSpinDownButtonUp to |CI$1000000 Set ComBackground OLEexSpinDownButtonDown to |CI$2000000 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Editor" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLESpinType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 20 to Nothing Send Destroy to hoItems End_Procedure |
371 |
How can change the visual appearance for the slider or track bar, using your EBN files
Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Set ComBackground OLEexSliderThumb to |CI$1000000 Set ComBackground OLEexSliderRange to (RGB(210,210,210)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Editor" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLESliderType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems 20 to Nothing Send Destroy to hoItems End_Procedure |
370 |
How can change the visual appearance for the button that are visible inside the editors, using your EBN files
Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Set ComBackground OLEexButtonDown to |CI$1000000 Set ComBackground OLEexButtonUp to |CI$2000000 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Editor" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEDateType Send ComAddButton of hoEditor 1 Nothing Nothing Nothing Nothing Nothing Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "1/1/2002" to Nothing Send Destroy to hoItems End_Procedure |
369 |
How can change the visual appearance for the button that shows the drop down editors, using your EBN files
Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voAppearance1 Get ComVisualAppearance to voAppearance1 Handle hoAppearance1 Get Create (RefClass(cComAppearance)) to hoAppearance1 Set pvComObject of hoAppearance1 to voAppearance1 Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing Send Destroy to hoAppearance1 Set ComBackground OLEexDropDownButtonUp to |CI$1000000 Set ComBackground OLEexDropDownButtonDown to |CI$2000000 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Editor" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEDateType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "1/1/2002" to Nothing Send Destroy to hoItems End_Procedure |
368 |
How can I find the column that gets the focus
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "Edit1" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Variant voEditor Get ComEditor of hoColumn to voEditor Handle hoEditor Get Create (RefClass(cComEditor)) to hoEditor Set pvComObject of hoEditor to voEditor Set ComEditType of hoEditor to OLEEditType Send Destroy to hoEditor Send Destroy to hoColumn Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Variant voColumn1 Get ComAdd of hoColumns1 "Edit2" to voColumn1 Handle hoColumn1 Get Create (RefClass(cComColumn)) to hoColumn1 Set pvComObject of hoColumn1 to voColumn1 Variant voEditor1 Get ComEditor of hoColumn1 to voEditor1 Handle hoEditor1 Get Create (RefClass(cComEditor)) to hoEditor1 Set pvComObject of hoEditor1 to voEditor1 Set ComEditType of hoEditor1 to OLEEditType Send Destroy to hoEditor1 Send Destroy to hoColumn1 Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellValue of hoItems (ComAddItem(hoItems,1)) 1 to 2 Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellValue of hoItems1 (ComAddItem(hoItems1,3)) 1 to 4 Send Destroy to hoItems1 Variant voItems2 Get ComItems to voItems2 Handle hoItems2 Get Create (RefClass(cComItems)) to hoItems2 Set pvComObject of hoItems2 to voItems2 Variant vCaption Get ComFocusColumnIndex to vCaption Set ComItemDivider of hoItems2 (ComAddItem(hoItems2,vCaption)) to 0 Send Destroy to hoItems2 End_Procedure |
367 |
How do I make the control read-only, but still can see the values in a drop down list
|
366 |
How do I make the control read-only
|
365 |
How do I change the control's border, using your EBN files
Procedure OnCreate Forward Send OnCreate Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Set ComAppearance to |CI$1000000 End_Procedure |
364 |
Can I change the default border of the tooltip, using your EBN files
|
363 |
Can I change the background color for the tooltip
Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Set ComToolTipWidth to 364 Set ComBackground OLEexToolTipBackColor to (RGB(255,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "tootip" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComToolTip of hoColumn to "this is a tooltip assigned to a column" Send Destroy to hoColumn Send Destroy to hoColumns End_Procedure |
362 |
Does the tooltip support HTML format
|
361 |
Can I change the forecolor for the tooltip
Procedure OnCreate Forward Send OnCreate Set ComToolTipDelay to 1 Set ComToolTipWidth to 364 Set ComBackground OLEexToolTipForeColor to (RGB(255,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "tootip" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComToolTip of hoColumn to "this is a tooltip assigned to a column" Send Destroy to hoColumn Send Destroy to hoColumns End_Procedure |
360 |
Can I change the foreground color for the tooltip
|
359 |
How can I merge cells
Procedure OnCreate Forward Send OnCreate Set ComDrawGridLines to OLEexAllLines Set ComMarkSearchColumn to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voColumns2 Get ComColumns to voColumns2 Handle hoColumns2 Get Create (RefClass(cComColumns)) to hoColumns2 Set pvComObject of hoColumns2 to voColumns2 Get ComAdd of hoColumns2 "C3" to Nothing Send Destroy to hoColumns2 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "this cell merges the first two columns" to h Set ComCellMerge of hoItems h 0 to 1 Get ComAddItem of hoItems Nothing to h Set ComCellValue of hoItems h 1 to "this cell merges the last two columns" Set ComCellMerge of hoItems h 1 to 2 Get ComAddItem of hoItems "this cell merges the all three columns" to h Set ComCellMerge of hoItems h 0 to 1 Set ComCellMerge of hoItems h 0 to 2 Get ComAddItem of hoItems "this draws a divider item" to h Set ComItemDivider of hoItems h to 0 Send Destroy to hoItems End_Procedure |
358 |
How can I merge cells
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voColumns2 Get ComColumns to voColumns2 Handle hoColumns2 Get Create (RefClass(cComColumns)) to hoColumns2 Set pvComObject of hoColumns2 to voColumns2 Get ComAdd of hoColumns2 "C3" to Nothing Send Destroy to hoColumns2 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems "This is bit of text merges all cells in the item (divider)" to h Set ComItemDivider of hoItems h to 0 Set ComItemDividerLine of hoItems h to OLEEmptyLine Set ComCellHAlignment of hoItems h 0 to OLECenterAlignment Get ComAddItem of hoItems "Cell 2" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines. (cellmerge)" Set ComCellMerge of hoItems h 1 to 2 Set ComCellSingleLine of hoItems h 1 to False Send Destroy to hoItems End_Procedure |
357 |
How can I specify the width for a splited cell
Procedure OnCreate Forward Send OnCreate Set ComDrawGridLines to OLEexRowLines Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Single Column" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Split 1" to h Variant s Get ComSplitCell of hoItems h 0 to s Set ComCellWidth of hoItems s to 64 Set ComCellValue of hoItems s to "Split 2" Variant s1 Get ComSplitCell of hoItems s to s1 Set ComCellValue of hoItems s1 to "Split 3" Set ComCellWidth of hoItems s1 to 64 Send Destroy to hoItems End_Procedure |
356 |
How can I split a cell in three parts
Procedure OnCreate Forward Send OnCreate Set ComDrawGridLines to OLEexRowLines Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Single Column" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Split 1" to h Variant s Get ComSplitCell of hoItems h 0 to s Set ComCellValue of hoItems s to "Split 2" Variant s1 Get ComSplitCell of hoItems s to s1 Set ComCellValue of hoItems s1 to "Split 3" Send Destroy to hoItems End_Procedure |
355 |
How can I add a button aligned to right
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Single Column" to Nothing Send Destroy to hoColumns Set ComShowFocusRect to False Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComItemDivider of hoItems (ComAddItem(hoItems,"This is a bit of text being displayed on the entire item")) to 0 Variant s Get ComSplitCell of hoItems (ComAddItem(hoItems,"Split Cell 1.1")) 0 to s Set ComCellValue of hoItems s to "Split Cell <img>1</img>" Set ComCellValueFormat of hoItems s to OLEexHTML Set ComCellHAlignment of hoItems s to OLECenterAlignment Set ComCellHasButton of hoItems s to True Set ComCellWidth of hoItems s to 84 Send Destroy to hoItems End_Procedure |
354 |
How can I split a cell
Procedure OnCreate Forward Send OnCreate Set ComDrawGridLines to OLEexRowLines Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voAppearance Get ComVisualAppearance to voAppearance Handle hoAppearance Get Create (RefClass(cComAppearance)) to hoAppearance Set pvComObject of hoAppearance to voAppearance Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing Send Destroy to hoAppearance Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Single Column" to Nothing Send Destroy to hoColumns Set ComShowFocusRect to False Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant s Get ComSplitCell of hoItems (ComAddItem(hoItems,"Split Cell 1.1")) 0 to s Set ComCellValue of hoItems s to "Split Cell <img>1</img>" Set ComCellValueFormat of hoItems s to OLEexHTML Set ComCellHAlignment of hoItems s to OLECenterAlignment Set ComCellBackColor of hoItems s to |CI$1000000 Set ComCellWidth of hoItems s to 84 Send Destroy to hoItems End_Procedure |
353 |
Can I select an item giving its general position
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectPos of hoItems to 1 Send Destroy to hoItems End_Procedure |
352 |
How can I change the color for separator / dividers items
Procedure OnCreate Forward Send OnCreate Set ComGridLineColor to (RGB(255,0,0)) Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Set ComScrollBySingleLine to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems Nothing to h Set ComItemDivider of hoItems h to 0 Set ComItemDividerLine of hoItems h to OLEDoubleDotLine Set ComItemDividerLineAlignment of hoItems h to OLEDividerCenter Set ComItemHeight of hoItems h to 6 Set ComSelectableItem of hoItems h to False Get ComAddItem of hoItems "Cell 2" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Send Destroy to hoItems End_Procedure |
351 |
How can I add separator - dividers items
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Set ComScrollBySingleLine to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems Nothing to h Set ComItemDivider of hoItems h to 0 Set ComItemDividerLine of hoItems h to OLEDoubleDotLine Set ComItemDividerLineAlignment of hoItems h to OLEDividerCenter Set ComItemHeight of hoItems h to 6 Set ComSelectableItem of hoItems h to False Get ComAddItem of hoItems "Cell 2" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Send Destroy to hoItems End_Procedure |
350 |
Can I change the style of the line being displayed by a divider item
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Set ComScrollBySingleLine to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems "This is bit of text that's displayed on the entire item, divider." to h Set ComItemDivider of hoItems h to 0 Set ComItemDividerLine of hoItems h to OLEDoubleDotLine Set ComCellHAlignment of hoItems h 0 to OLECenterAlignment Set ComItemHeight of hoItems h to 24 Send Destroy to hoItems End_Procedure |
349 |
Can I remove the line being displayed by a divider item
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems "This is bit of text that's displayed on the entire item, divider." to h Set ComItemDivider of hoItems h to 0 Set ComItemDividerLine of hoItems h to OLEEmptyLine Set ComCellHAlignment of hoItems h 0 to OLECenterAlignment Send Destroy to hoItems End_Procedure |
348 |
How can I display a divider item, merging all cells
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComTreeColumnIndex to -1 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Get ComAddItem of hoItems "This is bit of text that's displayed on the entire item, divider." to h Set ComItemDivider of hoItems h to 0 Set ComCellHAlignment of hoItems h 0 to OLECenterAlignment Send Destroy to hoItems End_Procedure |
347 |
How can I fix or lock items
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComLockedItemCount of hoItems OLEexTop to 1 Set ComCellValue of hoItems (ComLockedItem(hoItems,OLEexTop,0)) 0 to "This is a locked item, fixed to the top side of the control." Set ComItemBackColor of hoItems (ComLockedItem(hoItems,OLEexTop,0)) to (RGB(196,196,186)) Set ComLockedItemCount of hoItems OLEexBottom to 2 Set ComCellValue of hoItems (ComLockedItem(hoItems,OLEexBottom,0)) 0 to "This is a locked item, fixed to the top side of the control." Set ComItemBackColor of hoItems (ComLockedItem(hoItems,OLEexBottom,0)) to (RGB(196,196,186)) Set ComCellValue of hoItems (ComLockedItem(hoItems,OLEexBottom,1)) 0 to "This is a locked item, fixed to the top side of the control." Set ComItemBackColor of hoItems (ComLockedItem(hoItems,OLEexBottom,1)) to (RGB(186,186,186)) Send Destroy to hoItems End_Procedure |
346 |
How can I fix or lock an item on the bottom side of the control
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComLockedItemCount of hoItems OLEexBottom to 1 Set ComCellValue of hoItems (ComLockedItem(hoItems,OLEexBottom,0)) 0 to "This is a locked item, fixed to the bottom side of the control." Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Send Destroy to hoItems End_Procedure |
345 |
How can I fix or lock an item on the top of the control
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComLockedItemCount of hoItems OLEexTop to 1 Set ComCellValue of hoItems (ComLockedItem(hoItems,OLEexTop,0)) 0 to "This is a locked item, fixed to the top side of the control." Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Send Destroy to hoItems End_Procedure |
344 |
Is there any function to limit the height of the items when I display it using multiple lines
Procedure OnCreate Forward Send OnCreate Set ComScrollBySingleLine to True Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines. This is bit of text that's shown on multiple lines." Set ComCellSingleLine of hoItems h 1 to False Set ComItemMaxHeight of hoItems h to 48 Send Destroy to hoItems End_Procedure |
343 |
Why I cannot center my cells in the column
|
342 |
How can I align the cell to the left, center or to the right
Procedure OnCreate Forward Send OnCreate Set ComTreeColumnIndex to -1 Set ComDrawGridLines to OLEexRowLines Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellHAlignment of hoItems (ComAddItem(hoItems,"left")) 0 to OLELeftAlignment Set ComCellHAlignment of hoItems (ComAddItem(hoItems,"center")) 0 to OLECenterAlignment Set ComCellHAlignment of hoItems (ComAddItem(hoItems,"right")) 0 to OLERightAlignment Send Destroy to hoItems End_Procedure |
341 |
How do I apply HTML format to a cell
Procedure OnCreate Forward Send OnCreate Set ComTreeColumnIndex to -1 Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif" Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "The following item shows some of the HTML format supported:" to h Set ComCellHAlignment of hoItems h 0 to OLECenterAlignment Get ComAddItem of hoItems "text icons <img>1</img>, <img>2</img>, ... pictures <img>p1</img>, <img>p2</img>text <b>bold</b>, <i>italic</i>, <u>underline</u>, <s>strikeout</s>, ...<dotline>and so on... <a>anchor</a> or <a2>hyperlink</a><fgcolor=FF0000>fgcolor</fgcolor> or <bgcolor=00FF00>bgcolor</bgcolor> " to h Set ComCellValueFormat of hoItems h 0 to OLEexHTML Set ComCellSingleLine of hoItems h 0 to False Send Destroy to hoItems End_Procedure |
340 |
How can I change the font for a cell
|
339 |
How can I change the font for a cell
Procedure OnCreate Forward Send OnCreate Set ComDefaultItemHeight to 22 Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Get ComAddItem of hoItems "default font" to Nothing Send Destroy to hoItems Variant f Get Comcreateobject "StdFont" to f Set ComName to "Tahoma" Set ComSize to 12 Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellFont of hoItems1 (ComAddItem(hoItems1,"new font")) 0 to f Send Destroy to hoItems1 Variant voItems2 Get ComItems to voItems2 Handle hoItems2 Get Create (RefClass(cComItems)) to hoItems2 Set pvComObject of hoItems2 to voItems2 Variant v Get ComExecuteTemplate "Dim f;f = CreateObject(`StdFont`);{;Name = `Tahoma`;Size = 14;};" to v Set ComCellFont of hoItems2 (ComAddItem(hoItems2,"new font")) 0 to v Send Destroy to hoItems2 End_Procedure |
338 |
How can I change the font for entire item
|
337 |
How do I vertically align a cell
Procedure OnCreate Forward Send OnCreate Set ComDrawGridLines to OLEexRowLines Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Variant voColumn Get ComAdd of hoColumns "MultipleLine" to voColumn Handle hoColumn Get Create (RefClass(cComColumn)) to hoColumn Set pvComObject of hoColumn to voColumn Set ComDef of hoColumn OLEexCellSingleLine to False Send Destroy to hoColumn Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "VAlign" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "This is a bit of long text that should break the line" to h Set ComCellValue of hoItems h 1 to "top" Set ComCellVAlignment of hoItems h 1 to OLEexTop Get ComAddItem of hoItems "This is a bit of long text that should break the line" to h Set ComCellValue of hoItems h 1 to "middle" Set ComCellVAlignment of hoItems h 1 to OLEexMiddle Get ComAddItem of hoItems "This is a bit of long text that should break the line" to h Set ComCellValue of hoItems h 1 to "bottom" Set ComCellVAlignment of hoItems h 1 to OLEexBottom Send Destroy to hoItems End_Procedure |
336 |
How can I change the position of an item
|
335 |
How do I find an item based on a path
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Set ComItemData of hoItems (ComInsertItem(hoItems,h,"Child 2")) to 1234 Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComFindPath(hoItems,"Root 1\Child 1")) to True Send Destroy to hoItems End_Procedure |
334 |
How do I find an item based on my extra data
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Set ComItemData of hoItems (ComInsertItem(hoItems,h,"Child 2")) to 1234 Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComFindItemData(hoItems,1234,Nothing)) to True Send Destroy to hoItems End_Procedure |
333 |
How do I find an item
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComFindItem(hoItems,"Child 2",0,Nothing)) to True Send Destroy to hoItems End_Procedure |
332 |
How can I insert a hyperlink or an anchor element
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Column" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComCellValueFormat of hoItems (ComAddItem(hoItems,"Just an <a1>anchor</a> element ...")) 0 to OLEexHTML Send Destroy to hoItems Variant voItems1 Get ComItems to voItems1 Handle hoItems1 Get Create (RefClass(cComItems)) to hoItems1 Set pvComObject of hoItems1 to voItems1 Set ComCellValueFormat of hoItems1 (ComAddItem(hoItems1,"Just another <a2>anchor</a> element ...")) 0 to OLEexHTML Send Destroy to hoItems1 End_Procedure |
331 |
How do I find the index of the item based on its handle
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComItemByIndex(hoItems,(ComItemToIndex(hoItems,h)))) to True Send Destroy to hoItems End_Procedure |
330 |
How do I find the handle of the item based on its index
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComItemByIndex(hoItems,1)) to True Send Destroy to hoItems End_Procedure |
329 |
How can I find the cell being clicked in a radio group
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComSelBackColor to (RGB(255,255,128)) Set ComSelForeColor to (RGB(0,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voColumns2 Get ComColumns to voColumns2 Handle hoColumns2 Get Create (RefClass(cComColumns)) to hoColumns2 Set pvComObject of hoColumns2 to voColumns2 Get ComAdd of hoColumns2 "C3" to Nothing Send Destroy to hoColumns2 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Radio 1" Set ComCellHasRadioButton of hoItems h 1 to True Set ComCellRadioGroup of hoItems h 1 to 1234 Set ComCellValue of hoItems h 2 to "Radio 2" Set ComCellHasRadioButton of hoItems h 2 to True Set ComCellRadioGroup of hoItems h 2 to 1234 Set ComCellState of hoItems h 1 to 1 Set ComCellBold of hoItems (ComCellChecked(hoItems,1234)) to True Send Destroy to hoItems End_Procedure |
328 |
Can I add a +/- ( expand / collapse ) buttons to each item, so I can load the child items later
Procedure OnCreate Forward Send OnCreate Set ComLinesAtRoot to OLEexLinesAtRoot Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComItemHasChildren of hoItems (ComAddItem(hoItems,"parent item with no child items")) to True Get ComAddItem of hoItems "next item" to Nothing Send Destroy to hoItems End_Procedure |
327 |
Can I let the user to resize at runtime the specified item
Procedure OnCreate Forward Send OnCreate Set ComScrollBySingleLine to True Set ComDrawGridLines to OLEexRowLines Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Set ComItemAllowSizing of hoItems (ComAddItem(hoItems,"resizable item")) to True Get ComAddItem of hoItems "not resizable item" to Nothing Send Destroy to hoItems End_Procedure |
326 |
How can I change the size ( width, height ) of the picture
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture Set ComCellPicture of hoItems h 0 to (vPicture) Set ComCellPictureWidth of hoItems h 0 to 24 Set ComCellPictureHeight of hoItems h 0 to 24 Set ComItemHeight of hoItems h to 32 Get ComAddItem of hoItems "Root 2" to h Variant vPicture1 Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture1 Set ComCellPicture of hoItems h 0 to (vPicture1) Set ComItemHeight of hoItems h to 48 Send Destroy to hoItems End_Procedure |
325 |
How can I find the number or the count of selected items
Procedure OnCreate Forward Send OnCreate Set ComSingleSel to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectItem of hoItems (ComItemChild(hoItems,h)) to True Set ComSelectItem of hoItems (ComNextSiblingItem(hoItems,(ComItemChild(hoItems,h)))) to True Get ComAddItem of hoItems (ComSelectCount(hoItems)) to Nothing Send Destroy to hoItems End_Procedure |
324 |
How do I unselect an item
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectItem of hoItems h to False Send Destroy to hoItems End_Procedure |
323 |
How do I find the selected item
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectItem of hoItems h to True Set ComItemBold of hoItems (ComSelectedItem(hoItems,0)) to True Send Destroy to hoItems End_Procedure |
322 |
How do I un select all items
Procedure OnCreate Forward Send OnCreate Set ComSingleSel to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Send ComUnselectAll of hoItems Send Destroy to hoItems End_Procedure |
321 |
How do I select multiple items
Procedure OnCreate Forward Send OnCreate Set ComSingleSel to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectItem of hoItems (ComItemChild(hoItems,h)) to True Set ComSelectItem of hoItems (ComNextSiblingItem(hoItems,(ComItemChild(hoItems,h)))) to True Send Destroy to hoItems End_Procedure |
320 |
How do I select all items
Procedure OnCreate Forward Send OnCreate Set ComSingleSel to False Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Send ComSelectAll of hoItems Send Destroy to hoItems End_Procedure |
319 |
How do I select an item
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComSelectItem of hoItems h to True Send Destroy to hoItems End_Procedure |
318 |
Can I display a button with some picture or icon inside
Procedure OnCreate Forward Send OnCreate Set ComHTMLPicture "p1" to "gBHJJGHA5MIwAEIe4AAAFhwbiEQEsTigwEowjEZGA7jkdIsfkBQkUjLZQLclLZlk8rlRlOBlmEwl5wmhwPc3nCFPaFSCFnk8nqQTaQolEoabpCbUtKUtNWFPp67qVTXbFq1VqzQjjQKA7aFfaDbsRFHbbKBFsVpcrljjlsjlrtwIrlkrlPZwtbbtbleEieEleEqeE3eCFMuFODwsTwtbwxz7qz7tb7x+UfeXAOZzWbzmdz2f0Gh0Wj0ml02n1Gp1Wr1mt12v2Gx2Wz2m122318MAAhfIEAMMf4AFm6hPFIAI4L/BIcJCwUDBQYICYeKjwMSEYYRDaMJCcJCxURFRQYExMMDAOJAIQEBofMS4JCyUiRBQKCggLAJEChQIXEAxEEWBADAIxHAwHgyBATBEAEQoIg4EoXC4DB4nmQQDESAYRAwLBdFoEphAAEweCQeoQDCIRCFWLBXh8bB1FAVZBgMMBhkULodFAVgpkK4JUC6ZZbFabZbjYaIXCYJI7lKbpdjwTJ1EqHYIHI7IjhKewOCYXAYHCCoJhaaAmgyYBygWCJICKMAoRqI5Hg8FQMEoEhlDyURBAQO4Gk4GocAAcxDgeEAUFQLwWlCVRqlYCJbB8eBtAqdgBl6UQJgEaBgE2G5AhAYBBgGT4EA4Y5FguFYrFADAIkAIBBAKMBliUD5mluXR6nWbBZhGKgAEGYo4goDgcDYf4MG+XZeEMBh0BiVAvmeDwhkOe4OhcPAiHQe4wjASZ8BKLxwGQQB4mOSAHDKSBvkARQWmsDAhBeIoTGyAgEGgGoAgICo0HoEABggIETkKDApCQAIvGoCJKDABAQkRVIGhkUgQCGBYdiaegBAUEpeDAIgEiCOooAEBwJBCUBKC8DoHCoTQmBmBoQEGBwZHYEBhgAAYpAIYBGiYcoUAgKgpjyUAtDWKpglMCori8RICksAZcBSfIngAEpGFuIIDg4CIQFMOgyEsFJgEyAYSEgQAsDKNRMgsAAKCw54ACCcAwBOCBhAqO5ODkFhLAgISGh4W5zDoNw1DOdBQkQExVHQURGHkWpsDEPAig0DQ3EoDQYG+OwXkoeBoAMFwLCSaQFgwBA6kCIxLg0YhoC+e54jSbBVB6SoYAiAx+Dqf56A+VRPE0Mggj+OgOjwKA+gCawtCkQJcmcFQJCeVgLEWTAiGAVxSFWIJ6kSGBhCQXwvFocIui0EwMAyAwDGocABAabYNHAFYBmmbQqnaGMSIXRQAAAaD8UgSxBhmFqCIcAwAlBJB0AYETDRoBEAGBEfAzhICiFODYMwmRoCOBkNEUgw3AgMFCIMW4tQPDpBe4IUYVl8jwAMCAOIABHiuAoGsVgKQQjZGoL8FYnBzDBAOKwII+QtBWFkM0KwZQsC3HCJgCAkwpiJBYGUNgVBPBsBKJYJgDRQAlEuFINo4BgjLBgJsLgmxKhAFuLkGQCQNjwFsME3Y5AMhEAiBQCoZwOByA6AQUAZgsBCB+AUVwUQ5jWAyAQTwwAYgdG4NMPkkQuCgGeDUKAtXEBhBAIATodgXAHDEAgEY4A4ADDkK0YQGABAADEB4OAwABA2FWA8UoHQuCAGGNUdA4BCAXDcLgIRmQAA7ICA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to " Button <img>p1</img> " Set ComCellValueFormat of hoItems h 1 to OLEexHTML Set ComCellHAlignment of hoItems h 1 to OLERightAlignment Set ComCellHasButton of hoItems h 1 to True Set ComCellButtonAutoWidth of hoItems h 1 to True Set ComItemHeight of hoItems h to 48 Send Destroy to hoItems End_Procedure |
317 |
Can I display a button with some picture or icon inside
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to " Button <img>1</img> " Set ComCellValueFormat of hoItems h 1 to OLEexHTML Set ComCellHAlignment of hoItems h 1 to OLERightAlignment Set ComCellHasButton of hoItems h 1 to True Set ComCellButtonAutoWidth of hoItems h 1 to True Send Destroy to hoItems End_Procedure |
316 |
Can I display a button with some icon inside
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to " <img>1</img> " Set ComCellValueFormat of hoItems h 1 to OLEexHTML Set ComCellHAlignment of hoItems h 1 to OLERightAlignment Set ComCellHasButton of hoItems h 1 to True Set ComCellButtonAutoWidth of hoItems h 1 to True Send Destroy to hoItems End_Procedure |
315 |
How can I assign multiple icon/picture to a cell
Procedure OnCreate Forward Send OnCreate Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif" Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "text <img>p1</img> another picture <img>p2</img> and so on" to h Set ComCellValueFormat of hoItems h 0 to OLEexHTML Variant vPicture Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\colorize.gif`)" to vPicture Set ComCellPicture of hoItems h 0 to (vPicture) Set ComItemHeight of hoItems h to 48 Get ComAddItem of hoItems "Root 2" to Nothing Send Destroy to hoItems End_Procedure |
314 |
How can I assign an icon/picture to a cell
|
313 |
How can I assign multiple icons/pictures to a cell
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root <img>1</img> 1, <img>2</img>, ... and so on " to h Set ComCellValueFormat of hoItems h 0 to OLEexHTML Send Destroy to hoItems End_Procedure |
312 |
How can I assign multiple icons/pictures to a cell
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Set ComCellImages of hoItems h 0 to "1,2,3" Send Destroy to hoItems End_Procedure |
311 |
How can I assign an icon/picture to a cell
Procedure OnCreate Forward Send OnCreate Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=" Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Set ComCellImage of hoItems h 0 to 1 Set ComCellImage of hoItems (ComInsertItem(hoItems,h,"Child 1")) 0 to 2 Set ComCellImage of hoItems (ComInsertItem(hoItems,h,"Child 2")) 0 to 3 Set ComExpandItem of hoItems h to True Send Destroy to hoItems End_Procedure |
310 |
How can I get the handle of an item based on the handle of the cell
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "Default" to Nothing Send Destroy to hoColumns Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Root 1" to h Get ComInsertItem of hoItems h "Child 1" to Nothing Get ComInsertItem of hoItems h "Child 2" to Nothing Set ComExpandItem of hoItems h to True Set ComItemBold of hoItems (ComCellItem(hoItems,(ComItemCell(hoItems,h,0)))) to True Send Destroy to hoItems End_Procedure |
309 |
How can I display a button inside the item or cell
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to " Button 1 " Set ComCellHAlignment of hoItems h 1 to OLERightAlignment Set ComCellHasButton of hoItems h 1 to True Set ComCellButtonAutoWidth of hoItems h 1 to True Get ComAddItem of hoItems "Cell 2" to h Set ComCellValue of hoItems h 1 to " Button 2 " Set ComCellHAlignment of hoItems h 1 to OLECenterAlignment Set ComCellHasButton of hoItems h 1 to True Send Destroy to hoItems End_Procedure |
308 |
How can I change the state of a radio button
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComSelBackColor to (RGB(255,255,128)) Set ComSelForeColor to (RGB(0,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voColumns2 Get ComColumns to voColumns2 Handle hoColumns2 Get Create (RefClass(cComColumns)) to hoColumns2 Set pvComObject of hoColumns2 to voColumns2 Get ComAdd of hoColumns2 "C3" to Nothing Send Destroy to hoColumns2 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Radio 1" Set ComCellHasRadioButton of hoItems h 1 to True Set ComCellRadioGroup of hoItems h 1 to 1234 Set ComCellValue of hoItems h 2 to "Radio 2" Set ComCellHasRadioButton of hoItems h 2 to True Set ComCellRadioGroup of hoItems h 2 to 1234 Set ComCellState of hoItems h 1 to 1 Send Destroy to hoItems End_Procedure |
307 |
How can I assign a radio button to a cell
Procedure OnCreate Forward Send OnCreate Set ComMarkSearchColumn to False Set ComSelBackColor to (RGB(255,255,128)) Set ComSelForeColor to (RGB(0,0,0)) Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voColumns2 Get ComColumns to voColumns2 Handle hoColumns2 Get Create (RefClass(cComColumns)) to hoColumns2 Set pvComObject of hoColumns2 to voColumns2 Get ComAdd of hoColumns2 "C3" to Nothing Send Destroy to hoColumns2 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Radio 1" Set ComCellHasRadioButton of hoItems h 1 to True Set ComCellRadioGroup of hoItems h 1 to 1234 Set ComCellValue of hoItems h 2 to "Radio 2" Set ComCellHasRadioButton of hoItems h 2 to True Set ComCellRadioGroup of hoItems h 2 to 1234 Set ComCellState of hoItems h 1 to 1 Send Destroy to hoItems End_Procedure |
306 |
How can I change the state of a checkbox
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Check Box" Set ComCellHasCheckBox of hoItems h 1 to True Set ComCellState of hoItems h 1 to 1 Send Destroy to hoItems End_Procedure |
305 |
How can I assign a checkbox to a cell
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Check Box" Set ComCellHasCheckBox of hoItems h 1 to True Send Destroy to hoItems End_Procedure |
304 |
How can I display an item or a cell on multiple lines
Procedure OnCreate Forward Send OnCreate Set ComScrollBySingleLine to True Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "This is bit of text that's shown on multiple lines" Set ComCellSingleLine of hoItems h 1 to False Send Destroy to hoItems End_Procedure |
303 |
How can I assign a tooltip to a cell
|
302 |
How can I associate an extra data to a cell
|
301 |
How do I enable or disable a cell
Procedure OnCreate Forward Send OnCreate Variant voColumns Get ComColumns to voColumns Handle hoColumns Get Create (RefClass(cComColumns)) to hoColumns Set pvComObject of hoColumns to voColumns Get ComAdd of hoColumns "C1" to Nothing Send Destroy to hoColumns Variant voColumns1 Get ComColumns to voColumns1 Handle hoColumns1 Get Create (RefClass(cComColumns)) to hoColumns1 Set pvComObject of hoColumns1 to voColumns1 Get ComAdd of hoColumns1 "C2" to Nothing Send Destroy to hoColumns1 Variant voItems Get ComItems to voItems Handle hoItems Get Create (RefClass(cComItems)) to hoItems Set pvComObject of hoItems to voItems Variant h Get ComAddItem of hoItems "Cell 1" to h Set ComCellValue of hoItems h 1 to "Cell 2" Set ComCellEnabled of hoItems h 1 to False Send Destroy to hoItems End_Procedure |